home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 6
/
FM Towns Free Software Collection 6.iso
/
t_os
/
na386
/
add.bas
< prev
next >
Wrap
BASIC Source File
|
1993-07-08
|
271b
|
10 lines
1000 '*** 機械語プロシジャadd.rexを使ったサンプルプログラム ***
1010 '
1020 CLEAR ,,1024,2048,4096
1030 LOADM "ADD.REX",0
1040 RESULT&=1
1050 TEST&=2
1060 CALLM 0,VARPTR(RESULT&),&H12345678,TEST&
1070 PRINT "結果は";RIGHT$("00000000"+HEX$(RESULT&),8)
1080 END